home *** CD-ROM | disk | FTP | other *** search
/ C++ für Kids / C++ for kids.iso / Buch / Sterne3.cpp < prev    next >
Encoding:
C/C++ Source or Header  |  1998-12-27  |  1.5 KB  |  34 lines
  1. //---------------------------------------------------------------------------
  2. #include <vcl\vcl.h>
  3. #pragma hdrstop
  4.  
  5. #include "Sterne3.h"
  6. //---------------------------------------------------------------------------
  7. #pragma resource "*.dfm"
  8. TForm1 *Form1;
  9. //---------------------------------------------------------------------------
  10. __fastcall TForm1::TForm1(TComponent* Owner)
  11.     : TForm(Owner)
  12. {
  13. }
  14. //---------------------------------------------------------------------------
  15. void __fastcall TForm1::RadioGroup1Click(TObject *Sender)
  16. {
  17.   switch (RadioGroup1->ItemIndex)
  18.   {
  19.     case  0: Application->MessageBox ("???", "Januar", 0+64); break;
  20.     case  1: Application->MessageBox ("???", "Februar", 0+64); break;
  21.     case  2: Application->MessageBox ("???", "MΣrz", 0+64); break;
  22.     case  3: Application->MessageBox ("???", "April", 0+64); break;
  23.     case  4: Application->MessageBox ("???", "Mai", 0+64); break;
  24.     case  5: Application->MessageBox ("???", "Juni", 0+64); break;
  25.     case  6: Application->MessageBox ("???", "Juli", 0+64); break;
  26.     case  7: Application->MessageBox ("???", "August", 0+64); break;
  27.     case  8: Application->MessageBox ("???", "September", 0+64); break;
  28.     case  9: Application->MessageBox ("???", "Oktober", 0+64); break;
  29.     case 10: Application->MessageBox ("???", "November", 0+64); break;
  30.     case 11: Application->MessageBox ("???", "Dezember", 0+64);
  31.   }  
  32. }
  33. //---------------------------------------------------------------------------
  34.